home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 3-Presentations / Markets / Education / Solutions.91 / Solutions / background_6607.txt < prev    next >
Text File  |  1990-12-05  |  2KB  |  95 lines
  1. -- background: 6607 from stack: in
  2. -- bmap block id: 7430
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 
  6. ----- HyperTalk script -----
  7. function lineClicked
  8. return ((the clickV - top of the target) div the textHeight of the target) + 1
  9. end lineClicked
  10.  
  11.  
  12.  
  13.  
  14. -- part 25 (field)
  15. -- low flags: 00
  16. -- high flags: 0000
  17. -- rect: left=67 top=310 right=336 bottom=297
  18. -- title width / last selected line: 0
  19. -- icon id / first selected line: 0 / 0
  20. -- text alignment: 1
  21. -- font id: 156
  22. -- text size: 18
  23. -- style flags: 2048
  24. -- line height: 24
  25. -- part name: backWhere
  26.  
  27.  
  28. -- part 1 (field)
  29. -- low flags: 01
  30. -- high flags: 0000
  31. -- rect: left=60 top=31 right=64 bottom=477
  32. -- title width / last selected line: 0
  33. -- icon id / first selected line: 0 / 0
  34. -- text alignment: 0
  35. -- font id: 156
  36. -- text size: 24
  37. -- style flags: 10240
  38. -- line height: 32
  39. -- part name: Title
  40.  
  41.  
  42. -- part 12 (field)
  43. -- low flags: 01
  44. -- high flags: 0000
  45. -- rect: left=57 top=75 right=95 bottom=456
  46. -- title width / last selected line: 0
  47. -- icon id / first selected line: 0 / 0
  48. -- text alignment: 0
  49. -- font id: 2
  50. -- text size: 10
  51. -- style flags: 0
  52. -- line height: 16
  53. -- part name: Text
  54.  
  55.  
  56. -- part 21 (button)
  57. -- low flags: 00
  58. -- high flags: 0000
  59. -- rect: left=56 top=307 right=338 bottom=296
  60. -- title width / last selected line: 0
  61. -- icon id / first selected line: 0 / 0
  62. -- text alignment: 1
  63. -- font id: 0
  64. -- text size: 12
  65. -- style flags: 0
  66. -- line height: 16
  67. -- part name: Return
  68. ----- HyperTalk script -----
  69. on mouseUp
  70.   visual effect iris close
  71.   pop card
  72. end mouseUp
  73.  
  74.  
  75.  
  76. -- part 24 (field)
  77. -- low flags: 01
  78. -- high flags: 0000
  79. -- rect: left=57 top=92 right=212 bottom=509
  80. -- title width / last selected line: 0
  81. -- icon id / first selected line: 0 / 0
  82. -- text alignment: 0
  83. -- font id: 156
  84. -- text size: 18
  85. -- style flags: 0
  86. -- line height: 30
  87. -- part name: theList
  88. ----- HyperTalk script -----
  89. on mouseUp
  90.   select line lineClicked() of me
  91.   wait for 10
  92.   visual effect wipe left
  93.   go to card (the number of this card + lineClicked())
  94. end mouseUp
  95.